home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Delphi Magazine Collection 2001
/
Delphi Magazine Collection 20001 (2001).iso
/
DISKS
/
ISSUE08
/
EXCEPT
/
TRY2.DPR
< prev
next >
Encoding:
Amiga
Atari
Commodore
DOS
FM Towns/JPY
Macintosh
Macintosh JP
Macintosh to JP
NeXTSTEP
RISC OS/Acorn
Shift JIS
UTF-8
Wrap
Text File
|
1996-01-05
|
341 b
|
16 lines
program try2;
uses SysUtils, Dialogs, Hex;
var i: LongInt;
begin
try
i := HexVal('GOOD');
ShowMessage('We will never get here!')
except
on EBadHexString do
ShowMessage('Error: a bad HexStr was passed...');
on EHexConversion do
ShowMessage('Error: a Hex conversion error occurred.')
end
end.